home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FishMarket 1.0
/
FishMarket v1.0.iso
/
fishies
/
126-150
/
disk_143
/
rim
/
rimsrcami.arc
/
INCORE.BLK
< prev
next >
Wrap
Text File
|
1988-01-05
|
501b
|
18 lines
C
C *** / I N C O R E / ***
C
C CONTROL VARIABLES FOR INCORE BUFFER MANAGEMENT
C
COMMON /INCORE/ BLOCKS(3,20),NEXT,LIMIT,NUMBL
INTEGER BLOCKS
C
C VARIABLE DEFINITIONS:
C BLOCKS--ARRAY WITH POINTERS AND DIMENSIONS OF INCORE BLOCKS
C ROW 1---STARTING POSITION
C ROW 2---NUMBER OF ROWS
C ROW 3---NUMBER OF COLUMNS
C NEXT----NEXT AVAILABLE ADDRESS IN THE BUFFER
C LIMIT---LAST WORD IN THE BUFFER
C NUMBL---NUMBER OF BLOCKS DEFINED
C